home *** CD-ROM | disk | FTP | other *** search
/ Practical Algorithms for Image Analysis / Practical Algorithms for Image Analysis.iso / CH_2.4 / imgrotate / imgrotate.c < prev    next >
C/C++ Source or Header  |  1999-09-11  |  4KB  |  149 lines
  1. /* 
  2.  * imgrotate.c
  3.  * 
  4.  * Practical Algorithms for Image Analysis
  5.  * 
  6.  * Copyright (c) 1997, 1998, 1999 MLMSoftwareGroup, LLC
  7.  */
  8.  
  9. /* IMGROTATE:   program rotates image by given angle
  10.  *             usage: imgrotate inimg outimg angle [-o X_ORIGIN Y_ORIGIN]
  11.  *                                                 [-q] [-L]
  12.  */
  13.  
  14. #include <stdio.h>
  15. #include <stdlib.h>
  16. #include <string.h>
  17. #include <math.h>
  18. #include <tiffimage.h>          /* tiff info on images */
  19. #include <images.h>             /* for sun images */
  20. extern void print_sos_lic ();
  21.  
  22. int imrotate (Image *, Image *, double, long, long, short);
  23. int usage (short);
  24. int input (int, char **, double *, long *, long *, short *);
  25.  
  26. main (argc, argv)
  27.      int argc;
  28.      char *argv[];
  29. {
  30.   Image *imgI, *imgO;           /* I/O image structures */
  31.   unsigned char **imgIn,        /* image array */
  32.   **imgOut;                     /* output image */
  33.   long widthI, heightI,         /* input image size */
  34.     x0, y0;                     /* top left of output img in input img */
  35.   int gray;                     /* flag = 1 if image is gray; 0 otherwise */
  36.   double angle;                 /* angle to be rotated */
  37.   short quickFlag;              /* bilinear interp if 0; nearest pix if 1 */
  38.  
  39.   if ((input (argc, argv, &angle, &x0, &y0, &quickFlag)) < 0)
  40.     return (-1);
  41.  
  42. /* open input and output images */
  43.   imgI = ImageIn (argv[1]);
  44.   if (imgI->bps == 8 && imgI->spp == 3) {
  45.     printf ("Got RGB image!!!\nInput image must be Grayscale or B&W!!\n");
  46.     exit (1);
  47.   }
  48.   imgIn = imgI->img;
  49.   heightI = ImageGetHeight (imgI);
  50.   widthI = ImageGetWidth (imgI);
  51.   gray = (ImageIsGray (imgI)) ? 1 : 0;
  52.   printf ("image size is %dx%d\n", widthI, heightI);
  53.  
  54.   imgO = ImageAlloc (heightI, widthI, 8);  /* ImageGetDepth (imgI)); */
  55.   imgOut = ImageGetPtr (imgO);
  56.  
  57. /* set origin of rotation to be middle of image if default chosen */
  58.   if (x0 == -1) {
  59.     x0 = widthI / 2;
  60.     y0 = heightI / 2;
  61.   }
  62.  
  63. /* rotate image */
  64.   imrotate (imgI, imgO, angle, x0, y0, quickFlag);
  65.  
  66. /* write output rotated image */
  67.   ImageOut (argv[2], imgO);
  68.   return (0);
  69. }
  70.  
  71.  
  72. /* USAGE:       function gives instructions on usage of program
  73.  *                    usage: usage (flag)
  74.  *              When flag is 1, the long message is given, 0 gives short.
  75.  */
  76.  
  77. int
  78. usage (flag)
  79.      short flag;                /* flag =1 for long message; =0 for short message */
  80. {
  81.  
  82. /* print short usage message or long */
  83.   printf ("USAGE: imgrotate inimg outimg angle [-o X_ORIGIN Y_ORIGIN] [-q] [-L]\n");
  84.  
  85.   if (flag == 0)
  86.     return (-1);
  87.  
  88.   printf ("\nimgrotate rotates image by specified angle.\n\n");
  89.   printf ("ARGUMENTS:\n");
  90.   printf ("    inimg: input image filename (TIF)\n");
  91.   printf ("   outimg: output image filename (TIF)\n");
  92.   printf ("    angle: value (in degrees) of desired rotation with respect\n");
  93.   printf ("           to the horizontal; counter-clockwise is positive.\n\n");
  94.   printf ("OPTIONS:\n");
  95.   printf ("  -o X_ORIGIN Y_ORIGIN: are coordinates about which to rotate.\n");
  96.   printf ("                       (0,0) is at top-left corner.\n");
  97.   printf ("                        Default is middle of image.\n");
  98.   printf ("                    -q: if set, performs quicker rotation by using\n");
  99.   printf ("                        nearest-pixel instead of default bilinear interpolation.\n");
  100.   printf ("                    -L: print Software License for this module\n");
  101.  
  102.   return (-1);
  103. }
  104.  
  105.  
  106. /* INPUT:       function reads input parameters
  107.  *                    usage: input (argc, argv, angle, x0, y0, &quickFlag)
  108.  */
  109.  
  110. #define USAGE_EXIT(VALUE) {usage (VALUE); return (-1);}
  111.  
  112. int
  113. input (argc, argv, angle, x0, y0, quickFlag)
  114.      int argc;
  115.      char *argv[];
  116.      double *angle;             /* angle of rotation */
  117.      long *x0, *y0;             /* origin of rotation */
  118.      short *quickFlag;          /* bilinear interp if 0; nearest pix if 1 */
  119. {
  120.   long n;
  121.   double atof ();
  122.  
  123.   if (argc < 4)
  124.     USAGE_EXIT (1);
  125.  
  126.   *angle = atof (argv[3]);
  127.   *x0 = *y0 = -1;
  128.   *quickFlag = 0;
  129.  
  130.   for (n = 4; n < argc; n++) {
  131.     if (strcmp (argv[n], "-o") == 0) {
  132.       if (++n == argc || argv[n][0] == '-')
  133.         USAGE_EXIT (0);
  134.       *x0 = atol (argv[n]);
  135.       *y0 = atol (argv[++n]);
  136.     }
  137.     else if (strcmp (argv[n], "-q") == 0)
  138.       *quickFlag = 1;
  139.     else if (strcmp (argv[n], "-L") == 0) {
  140.       print_sos_lic ();
  141.       exit (0);
  142.     }
  143.     else
  144.       USAGE_EXIT (0);
  145.   }
  146.  
  147.   return (0);
  148. }
  149.